home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 234
/
234.d81
/
splat boot
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
288b
|
10 lines
0 rem splat! boot program a
1 rem by john william harris
2 poke 44,12:clr:poke 3072,0:poke53281,0:poke53280,0
3 a$=chr$(34):dv=peek(186):ifdv<8thendv=8
4 print"[144][147]load"a$"snd 2049.o"a$","dv",1"
5 print"new"
6 print"load"a$"splat boot-b"a$","dv
7 print"run"
8 poke 198,5:for a=631 to 635:poke a,13:next:print"";:end